home *** CD-ROM | disk | FTP | other *** search
- ;$VER: ViewDIZ-Extras_install 1.0 (3.9.98) Mikael Lund
- (message
- "\nW E L C O M E T O V I E W D I Z E X T R A S\n\n"
- "This package contain much of the software used by ViewDiz external modules "
- "and wizards. Also you will find buttons for DirectoryOpus, a nice ANSI font "
- "and additional documentation. If you want to develop modules for ViewDiz you "
- "will might find the included template-file interesting.\n\n"
- "Enjoy it !"
- )
-
- (welcome)
-
- (set #bin
- (askoptions
- (prompt "\nWhat should be installed ?\n")
- (help
- "* Commands: for the different modules - Highly recommended!\n"
- "* JetTerm ANSI-font: To be used with the Font/A argument - Nice!\n"
- "* DOpus5+ buttons: A must if you have directoryopus.\n"
- "* Docs: Only for the more advanced users/developers.\n"
- "* Developer: For developers only.\n"
- "* Rexxdossupport: Used by some wizards, incl. Guidelist"
- )
- (default %100111)
- (choices
- "Commands"
- "JetTerm ANSI-font"
- "DirectoryOpus 5+ buttons & small-image"
- "Documentation for commands"
- "Developer material"
- "Rexxdossupport.library"
- )
- )
- )
-
- ;*** commands
- (if (IN #bin 0)
- (
- (set #sel
- (askoptions
- (prompt "\nWhich external commands should be installed ?\n(Press the help-button for details)\n")
- (help
- "To use ViewDiz you will need some additional programs depending on which "
- "filetypes you wish to process.\n\n"
-
- "* Copy2Clip is for the Clipboard-wizard.\n"
- "* DMSdescript for DMS-processing.\n"
- "* MagicDIZ for pictures.\n"
- "* xDIZ for XPK-processing.\n"
- "* Textract is for text-files.\n"
- "* ModuleDescript for unpacked MOD/MED modules.\n"
- "* UnARJ_FID is for ARJ files.\n"
- "* PlayTune for playing music\n"
- "* ExeDescript for processing exe-files.\n\n"
-
- "Not all required programs are included in this package - below is a list of "
- "other programs you will need to process other filetypes:\n\n"
-
- "* LHA,LZX,ZIP,UNZIP are required for Lha, LZx and ZIP archives.\n"
- "* DMS is required if you want to unpack a DMS-files to a disk.\n"
- "* XFDdecrunch is required for unpacking packed datafiles.\n\n"
-
- "The files will be copied to C: - You may move them to another destination "
- "as long as this is in the command path."
- )
- (choices
- "MagicDIZ v2.06 (9k)"
- "DMSdescript v1.1 (16k)"
- "Textract v1.0 (15k)"
- "Copy2Clip v1.0 (1k)"
- "xDiz v1.5 (4k)"
- "ModuleDescript v1.0 (2k)"
- "UnArj_FID v1.02 (16k)"
- "PlayTune v1.1 (5k)"
- "ExeDescript v1.0 (15k)"
- )
- (default %111111111)
- )
- )
- (working "Installing commands")
- (if (IN #sel 0) (copylib (dest "c:") (source "c/MagicDIZ") (nogauge)))
- (if (IN #sel 1) (copyfiles (dest "c:") (source "c/DMSdescript") (nogauge)))
- (if (IN #sel 2) (copylib (dest "c:") (source "c/Textract") (nogauge)))
- (if (IN #sel 3) (copylib (dest "c:") (source "c/Copy2Clip") (nogauge)))
- (if (IN #sel 4) (copyfiles (dest "c:") (source "c/xDiz") (nogauge)))
- (if (IN #sel 5) (copyfiles (dest "c:") (source "c/ModuleDescript") (nogauge)))
- (if (IN #sel 6) (copyfiles (dest "c:") (source "c/UnArj_FID") (nogauge)))
- (if (IN #sel 7)
- (
- (copyfiles
- (nogauge)
- (dest "s:")
- (source "s/")
- (pattern "#?")
- )
- (run "protect s:PlayTune rweds")
- )
- )
- (if (IN #sel 8) (copyfiles (dest "c:") (source "c/ExeDescript") (nogauge)))
- )
- )
-
- (if (IN #bin 1)
- (
- (working "Installing font")
- (copyfiles
- (nogauge)
- (source "fonts/")
- (dest "fonts:")
- (pattern "#?")
- )
- )
- )
-
- (if (IN #bin 2)
- (if (exists "Dopus5:" (noreq))
- (
- (working "Installing DirectoryOpus buttons & image")
- (copyfiles
- (nogauge)
- (source "Dopus5/")
- (dest "Dopus5:")
- (pattern "#?")
- )
- )
- )
- )
-
- (if (IN #bin 3)
- (
- (working "Installing documentation")
- (
- (if (exists "HELP:" (noreq))
- (set #docdest "HELP:")
- (set #docdest "S:")
- )
- (copyfiles
- (nogauge)
- (dest #docdest)
- (source "docs/")
- (pattern "#?")
- )
- )
- )
- )
-
- (if (IN #bin 4)
- (
- (working "Installing developer material")
- (copyfiles
- (nogauge)
- (source "developer/.template")
- (dest "envarc:viewdiz/modules")
- )
- )
- )
-
- (if (IN #bin 5)
- (
- (working "Installing libraries")
- (copylib
- (nogauge)
- (source "libs/rexxdossupport.library")
- (dest "libs:")
- )
- )
- )
-
- (exit
- "\nInstallation of "
- @app-name
- " complete !\n\n"
- (quiet)
- )
-